﻿Imports DAO
Imports DTO
Public Class CaTrucBUS
    Dim ctDAO As New DAO.CaTrucDAO
    Public Function LoadTinhTrangCaTruc() As DataTable
        Dim dt As DataTable
        dt = ctDAO.LoadTinhTrangCaTruc()
        Return dt
    End Function
    Public Sub BatDauCaTruc(ByVal _ma As String)
        ctDAO.BatDauCaTruc(_ma)
    End Sub
    Public Sub KetThucCaTruc(ByVal _ma As String)
        ctDAO.KetThucCaTruc(_ma)
    End Sub
End Class
